/ Nebula 2 / Nebula Two.iso / Apps / EmacsTeX / TeXfig / Source / TeXfigApplication.m

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 23 69 6d 70 6f 72 74 20 | 3c 73 74 64 69 6f 2e 68 |#import |<stdio.h|
|00000010| 3e 0a 23 69 6d 70 6f 72 | 74 20 3c 73 74 72 69 6e |>.#impor|t <strin|
|00000020| 67 2e 68 3e 0a 23 69 6d | 70 6f 72 74 20 22 54 65 |g.h>.#im|port "Te|
|00000030| 58 66 69 67 41 70 70 6c | 69 63 61 74 69 6f 6e 2e |XfigAppl|ication.|
|00000040| 68 22 0a 23 69 6d 70 6f | 72 74 20 22 54 65 58 66 |h".#impo|rt "TeXf|
|00000050| 69 67 49 6d 61 67 65 56 | 69 65 77 2e 68 22 0a 0a |igImageV|iew.h"..|
|00000060| 0a 0a 0a 40 69 6e 74 65 | 72 66 61 63 65 20 54 65 |...@inte|rface Te|
|00000070| 58 69 74 65 6d 3a 20 4f | 62 6a 65 63 74 0a 7b 0a |Xitem: O|bject.{.|
|00000080| 09 63 68 61 72 20 2a 74 | 65 78 74 3b 0a 09 69 64 |.char *t|ext;..id|
|00000090| 20 69 6d 61 67 65 3b 0a | 09 42 4f 4f 4c 20 70 72 | image;.|.BOOL pr|
|000000a0| 69 6e 74 65 72 3b 09 0a | 7d 0a 2d 20 74 65 78 74 |inter;..|}.- text|
|000000b0| 3a 28 63 68 61 72 2a 29 | 6e 65 77 54 65 78 74 3b |:(char*)|newText;|
|000000c0| 0a 2d 20 28 63 68 61 72 | 2a 29 74 65 78 74 3b 0a |.- (char|*)text;.|
|000000d0| 2d 20 69 6d 61 67 65 3a | 6e 65 77 49 6d 61 67 65 |- image:|newImage|
|000000e0| 3b 0a 2d 20 69 6d 61 67 | 65 3b 0a 2d 20 69 6e 69 |;.- imag|e;.- ini|
|000000f0| 74 3b 0a 2d 20 66 72 65 | 65 3b 0a 2d 20 28 42 4f |t;.- fre|e;.- (BO|
|00000100| 4f 4c 29 75 73 65 50 72 | 69 6e 74 65 72 3b 0a 2d |OL)usePr|inter;.-|
|00000110| 20 75 73 65 50 72 69 6e | 74 65 72 3a 28 42 4f 4f | usePrin|ter:(BOO|
|00000120| 4c 29 66 6c 61 67 3b 0a | 2d 20 77 72 69 74 65 3a |L)flag;.|- write:|
|00000130| 28 4e 58 54 79 70 65 64 | 53 74 72 65 61 6d 2a 29 |(NXTyped|Stream*)|
|00000140| 74 79 70 65 64 53 74 72 | 65 61 6d 3b 0a 2d 20 72 |typedStr|eam;.- r|
|00000150| 65 61 64 3a 28 4e 58 54 | 79 70 65 64 53 74 72 65 |ead:(NXT|ypedStre|
|00000160| 61 6d 2a 29 74 79 70 65 | 64 53 74 72 65 61 6d 3b |am*)type|dStream;|
|00000170| 0a 40 65 6e 64 0a 0a 40 | 69 6d 70 6c 65 6d 65 6e |.@end..@|implemen|
|00000180| 74 61 74 69 6f 6e 20 54 | 65 58 69 74 65 6d 0a 0a |tation T|eXitem..|
|00000190| 0a 2d 20 77 72 69 74 65 | 3a 28 4e 58 54 79 70 65 |.- write|:(NXType|
|000001a0| 64 53 74 72 65 61 6d 2a | 29 74 79 70 65 64 53 74 |dStream*|)typedSt|
|000001b0| 72 65 61 6d 0a 7b 0a 09 | 69 6e 74 20 70 72 69 6e |ream.{..|int prin|
|000001c0| 74 65 72 56 61 72 2c 6c | 65 6e 67 74 68 3b 0a 09 |terVar,l|ength;..|
|000001d0| 63 68 61 72 20 62 75 66 | 5b 31 5d 3b 0a 09 5b 73 |char buf|[1];..[s|
|000001e0| 75 70 65 72 20 77 72 69 | 74 65 3a 74 79 70 65 64 |uper wri|te:typed|
|000001f0| 53 74 72 65 61 6d 5d 3b | 0a 09 70 72 69 6e 74 65 |Stream];|..printe|
|00000200| 72 56 61 72 20 3d 20 28 | 70 72 69 6e 74 65 72 29 |rVar = (|printer)|
|00000210| 3f 31 3a 30 3b 0a 09 69 | 66 28 74 65 78 74 3d 3d |?1:0;..i|f(text==|
|00000220| 4e 55 4c 4c 29 20 6c 65 | 6e 67 74 68 3d 30 3b 0a |NULL) le|ngth=0;.|
|00000230| 09 65 6c 73 65 20 6c 65 | 6e 67 74 68 20 3d 20 73 |.else le|ngth = s|
|00000240| 74 72 6c 65 6e 28 74 65 | 78 74 29 3b 0a 09 4e 58 |trlen(te|xt);..NX|
|00000250| 57 72 69 74 65 54 79 70 | 65 73 28 74 79 70 65 64 |WriteTyp|es(typed|
|00000260| 53 74 72 65 61 6d 2c 22 | 69 69 22 2c 20 26 70 72 |Stream,"|ii", &pr|
|00000270| 69 6e 74 65 72 56 61 72 | 2c 26 6c 65 6e 67 74 68 |interVar|,&length|
|00000280| 29 3b 0a 09 69 66 28 74 | 65 78 74 3d 3d 4e 55 4c |);..if(t|ext==NUL|
|00000290| 4c 29 20 7b 0a 09 09 62 | 75 66 5b 30 5d 3d 27 5c |L) {...b|uf[0]='\|
|000002a0| 30 27 3b 0a 09 09 4e 58 | 57 72 69 74 65 54 79 70 |0';...NX|WriteTyp|
|000002b0| 65 28 74 79 70 65 64 53 | 74 72 65 61 6d 2c 22 2a |e(typedS|tream,"*|
|000002c0| 22 2c 26 62 75 66 29 3b | 0a 09 7d 20 65 6c 73 65 |",&buf);|..} else|
|000002d0| 20 4e 58 57 72 69 74 65 | 54 79 70 65 28 74 79 70 | NXWrite|Type(typ|
|000002e0| 65 64 53 74 72 65 61 6d | 2c 22 2a 22 2c 26 74 65 |edStream|,"*",&te|
|000002f0| 78 74 29 3b 0a 09 0a 09 | 4e 58 57 72 69 74 65 52 |xt);....|NXWriteR|
|00000300| 6f 6f 74 4f 62 6a 65 63 | 74 28 74 79 70 65 64 53 |ootObjec|t(typedS|
|00000310| 74 72 65 61 6d 2c 69 6d | 61 67 65 29 3b 0a 09 72 |tream,im|age);..r|
|00000320| 65 74 75 72 6e 20 73 65 | 6c 66 3b 0a 7d 0a 0a 2d |eturn se|lf;.}..-|
|00000330| 20 72 65 61 64 3a 28 4e | 58 54 79 70 65 64 53 74 | read:(N|XTypedSt|
|00000340| 72 65 61 6d 2a 29 74 79 | 70 65 64 53 74 72 65 61 |ream*)ty|pedStrea|
|00000350| 6d 0a 7b 0a 09 69 6e 74 | 20 70 72 69 6e 74 65 72 |m.{..int| printer|
|00000360| 56 61 72 2c 20 6c 65 6e | 67 74 68 3b 0a 09 5b 73 |Var, len|gth;..[s|
|00000370| 75 70 65 72 20 72 65 61 | 64 3a 74 79 70 65 64 53 |uper rea|d:typedS|
|00000380| 74 72 65 61 6d 5d 3b 0a | 09 4e 58 52 65 61 64 54 |tream];.|.NXReadT|
|00000390| 79 70 65 73 28 74 79 70 | 65 64 53 74 72 65 61 6d |ypes(typ|edStream|
|000003a0| 2c 22 69 69 22 2c 26 70 | 72 69 6e 74 65 72 56 61 |,"ii",&p|rinterVa|
|000003b0| 72 2c 26 6c 65 6e 67 74 | 68 29 3b 0a 09 69 66 28 |r,&lengt|h);..if(|
|000003c0| 70 72 69 6e 74 65 72 56 | 61 72 29 20 70 72 69 6e |printerV|ar) prin|
|000003d0| 74 65 72 3d 59 45 53 3b | 0a 09 65 6c 73 65 20 70 |ter=YES;|..else p|
|000003e0| 72 69 6e 74 65 72 3d 4e | 4f 3b 0a 09 74 65 78 74 |rinter=N|O;..text|
|000003f0| 20 3d 20 28 63 68 61 72 | 2a 29 63 61 6c 6c 6f 63 | = (char|*)calloc|
|00000400| 28 6c 65 6e 67 74 68 2b | 31 2c 73 69 7a 65 6f 66 |(length+|1,sizeof|
|00000410| 28 63 68 61 72 29 29 3b | 0a 09 4e 58 52 65 61 64 |(char));|..NXRead|
|00000420| 54 79 70 65 28 74 79 70 | 65 64 53 74 72 65 61 6d |Type(typ|edStream|
|00000430| 2c 22 2a 22 2c 26 74 65 | 78 74 29 3b 0a 09 74 65 |,"*",&te|xt);..te|
|00000440| 78 74 5b 6c 65 6e 67 74 | 68 5d 3d 27 5c 30 27 3b |xt[lengt|h]='\0';|
|00000450| 0a 09 69 6d 61 67 65 20 | 3d 20 4e 58 52 65 61 64 |..image |= NXRead|
|00000460| 4f 62 6a 65 63 74 28 74 | 79 70 65 64 53 74 72 65 |Object(t|ypedStre|
|00000470| 61 6d 29 3b 0a 09 72 65 | 74 75 72 6e 20 73 65 6c |am);..re|turn sel|
|00000480| 66 3b 0a 7d 0a 0a 0a 2d | 20 28 42 4f 4f 4c 29 75 |f;.}...-| (BOOL)u|
|00000490| 73 65 50 72 69 6e 74 65 | 72 0a 7b 0a 09 72 65 74 |sePrinte|r.{..ret|
|000004a0| 75 72 6e 20 70 72 69 6e | 74 65 72 3b 0a 7d 0a 0a |urn prin|ter;.}..|
|000004b0| 2d 20 75 73 65 50 72 69 | 6e 74 65 72 3a 28 42 4f |- usePri|nter:(BO|
|000004c0| 4f 4c 29 66 6c 61 67 0a | 7b 0a 09 70 72 69 6e 74 |OL)flag.|{..print|
|000004d0| 65 72 20 3d 20 66 6c 61 | 67 3b 0a 09 72 65 74 75 |er = fla|g;..retu|
|000004e0| 72 6e 20 73 65 6c 66 3b | 0a 7d 0a 0a 2d 20 69 6e |rn self;|.}..- in|
|000004f0| 69 74 0a 7b 0a 09 74 65 | 78 74 3d 4e 55 4c 4c 3b |it.{..te|xt=NULL;|
|00000500| 0a 09 69 6d 61 67 65 3d | 6e 69 6c 3b 0a 09 70 72 |..image=|nil;..pr|
|00000510| 69 6e 74 65 72 3d 4e 4f | 3b 0a 09 72 65 74 75 72 |inter=NO|;..retur|
|00000520| 6e 20 73 65 6c 66 3b 0a | 7d 0a 0a 2d 20 66 72 65 |n self;.|}..- fre|
|00000530| 65 0a 7b 0a 09 69 66 28 | 74 65 78 74 3d 3d 4e 55 |e.{..if(|text==NU|
|00000540| 4c 4c 29 20 66 72 65 65 | 28 74 65 78 74 29 3b 0a |LL) free|(text);.|
|00000550| 09 5b 69 6d 61 67 65 20 | 66 72 65 65 5d 3b 0a 09 |.[image |free];..|
|00000560| 5b 73 75 70 65 72 20 66 | 72 65 65 5d 3b 0a 09 72 |[super f|ree];..r|
|00000570| 65 74 75 72 6e 20 73 65 | 6c 66 3b 0a 7d 0a 0a 0a |eturn se|lf;.}...|
|00000580| 2d 20 74 65 78 74 3a 28 | 63 68 61 72 2a 29 6e 65 |- text:(|char*)ne|
|00000590| 77 54 65 78 74 0a 7b 0a | 09 69 66 28 74 65 78 74 |wText.{.|.if(text|
|000005a0| 21 3d 4e 55 4c 4c 29 20 | 7b 0a 09 09 66 72 65 65 |!=NULL) |{...free|
|000005b0| 28 74 65 78 74 29 3b 0a | 09 7d 0a 09 69 66 28 6e |(text);.|.}..if(n|
|000005c0| 65 77 54 65 78 74 3d 3d | 4e 55 4c 4c 29 20 7b 0a |ewText==|NULL) {.|
|000005d0| 09 09 74 65 78 74 3d 4e | 55 4c 4c 3b 0a 09 09 72 |..text=N|ULL;...r|
|000005e0| 65 74 75 72 6e 20 73 65 | 6c 66 3b 0a 09 7d 0a 09 |eturn se|lf;..}..|
|000005f0| 74 65 78 74 20 3d 20 28 | 63 68 61 72 2a 29 63 61 |text = (|char*)ca|
|00000600| 6c 6c 6f 63 28 73 74 72 | 6c 65 6e 28 6e 65 77 54 |lloc(str|len(newT|
|00000610| 65 78 74 29 2b 31 2c 73 | 69 7a 65 6f 66 28 63 68 |ext)+1,s|izeof(ch|
|00000620| 61 72 29 29 3b 0a 09 73 | 74 72 63 70 79 28 74 65 |ar));..s|trcpy(te|
|00000630| 78 74 2c 6e 65 77 54 65 | 78 74 29 3b 0a 0a 09 72 |xt,newTe|xt);...r|
|00000640| 65 74 75 72 6e 20 73 65 | 6c 66 3b 0a 7d 0a 2d 20 |eturn se|lf;.}.- |
|00000650| 28 63 68 61 72 2a 29 74 | 65 78 74 0a 7b 0a 09 72 |(char*)t|ext.{..r|
|00000660| 65 74 75 72 6e 20 74 65 | 78 74 3b 0a 7d 0a 2d 20 |eturn te|xt;.}.- |
|00000670| 69 6d 61 67 65 3a 20 6e | 65 77 49 6d 61 67 65 0a |image: n|ewImage.|
|00000680| 7b 0a 09 69 66 28 69 6d | 61 67 65 21 3d 6e 69 6c |{..if(im|age!=nil|
|00000690| 29 20 5b 69 6d 61 67 65 | 20 66 72 65 65 5d 3b 0a |) [image| free];.|
|000006a0| 09 69 6d 61 67 65 20 3d | 20 6e 65 77 49 6d 61 67 |.image =| newImag|
|000006b0| 65 3b 0a 09 72 65 74 75 | 72 6e 20 73 65 6c 66 3b |e;..retu|rn self;|
|000006c0| 0a 7d 0a 2d 20 69 6d 61 | 67 65 0a 7b 0a 09 72 65 |.}.- ima|ge.{..re|
|000006d0| 74 75 72 6e 20 69 6d 61 | 67 65 3b 0a 7d 0a 0a 40 |turn ima|ge;.}..@|
|000006e0| 65 6e 64 0a 0a 0a 0a 0a | 40 69 6d 70 6c 65 6d 65 |end.....|@impleme|
|000006f0| 6e 74 61 74 69 6f 6e 20 | 54 65 58 66 69 67 41 70 |ntation |TeXfigAp|
|00000700| 70 6c 69 63 61 74 69 6f | 6e 0a 0a 0a 2d 20 61 70 |plicatio|n...- ap|
|00000710| 70 44 69 64 49 6e 69 74 | 3a 73 65 6e 64 65 72 0a |pDidInit|:sender.|
|00000720| 7b 0a 09 69 66 28 21 73 | 74 72 6c 65 6e 28 66 69 |{..if(!s|trlen(fi|
|00000730| 6c 65 6e 61 6d 65 29 29 | 7b 0a 09 09 69 6d 61 67 |lename))|{...imag|
|00000740| 65 4c 69 73 74 20 3d 20 | 5b 5b 4c 69 73 74 20 6e |eList = |[[List n|
|00000750| 65 77 5d 20 69 6e 69 74 | 5d 3b 0a 09 09 63 75 72 |ew] init|];...cur|
|00000760| 72 65 6e 74 54 65 58 3d | 6e 69 6c 3b 0a 09 09 5b |rentTeX=|nil;...[|
|00000770| 73 65 6c 66 20 69 6e 73 | 65 72 74 3a 20 73 65 6c |self ins|ert: sel|
|00000780| 66 5d 3b 0a 09 09 70 72 | 69 6e 74 65 72 3d 4e 4f |f];...pr|inter=NO|
|00000790| 3b 0a 09 09 5b 5b 69 6d | 61 67 65 56 69 65 77 20 |;...[[im|ageView |
|000007a0| 77 69 6e 64 6f 77 5d 20 | 73 65 74 54 69 74 6c 65 |window] |setTitle|
|000007b0| 41 73 46 69 6c 65 6e 61 | 6d 65 3a 22 55 6e 74 69 |AsFilena|me:"Unti|
|000007c0| 74 6c 65 64 22 5d 3b 0a | 09 09 73 74 72 63 70 79 |tled"];.|..strcpy|
|000007d0| 28 66 69 6c 65 6e 61 6d | 65 2c 22 22 29 3b 0a 09 |(filenam|e,"");..|
|000007e0| 7d 0a 09 72 65 74 75 72 | 6e 20 73 65 6c 66 3b 0a |}..retur|n self;.|
|000007f0| 7d 0a 0a 2d 20 70 72 69 | 6e 74 65 72 3a 73 65 6e |}..- pri|nter:sen|
|00000800| 64 65 72 0a 7b 0a 09 70 | 72 69 6e 74 65 72 3d 59 |der.{..p|rinter=Y|
|00000810| 45 53 3b 0a 09 5b 73 63 | 72 65 65 6e 42 75 74 74 |ES;..[sc|reenButt|
|00000820| 6f 6e 20 73 65 74 53 74 | 61 74 65 3a 20 4e 4f 5d |on setSt|ate: NO]|
|00000830| 3b 0a 09 69 66 28 21 5b | 70 72 69 6e 74 65 72 42 |;..if(![|printerB|
|00000840| 75 74 74 6f 6e 20 73 74 | 61 74 65 5d 29 20 5b 70 |utton st|ate]) [p|
|00000850| 72 69 6e 74 65 72 42 75 | 74 74 6f 6e 20 73 65 74 |rinterBu|tton set|
|00000860| 53 74 61 74 65 3a 59 45 | 53 5d 3b 0a 09 69 66 28 |State:YE|S];..if(|
|00000870| 63 75 72 72 65 6e 74 54 | 65 58 21 3d 6e 69 6c 29 |currentT|eX!=nil)|
|00000880| 20 5b 63 75 72 72 65 6e | 74 54 65 58 20 75 73 65 | [curren|tTeX use|
|00000890| 50 72 69 6e 74 65 72 3a | 59 45 53 5d 3b 0a 09 72 |Printer:|YES];..r|
|000008a0| 65 74 75 72 6e 20 73 65 | 6c 66 3b 0a 7d 0a 2d 20 |eturn se|lf;.}.- |
|000008b0| 73 63 72 65 65 6e 3a 73 | 65 6e 64 65 72 0a 7b 0a |screen:s|ender.{.|
|000008c0| 09 70 72 69 6e 74 65 72 | 3d 4e 4f 3b 0a 09 5b 70 |.printer|=NO;..[p|
|000008d0| 72 69 6e 74 65 72 42 75 | 74 74 6f 6e 20 73 65 74 |rinterBu|tton set|
|000008e0| 53 74 61 74 65 3a 20 4e | 4f 5d 3b 0a 09 69 66 28 |State: N|O];..if(|
|000008f0| 21 5b 73 63 72 65 65 6e | 42 75 74 74 6f 6e 20 73 |![screen|Button s|
|00000900| 74 61 74 65 5d 29 20 5b | 73 63 72 65 65 6e 42 75 |tate]) [|screenBu|
|00000910| 74 74 6f 6e 20 73 65 74 | 53 74 61 74 65 3a 59 45 |tton set|State:YE|
|00000920| 53 5d 3b 0a 09 69 66 28 | 63 75 72 72 65 6e 74 54 |S];..if(|currentT|
|00000930| 65 58 21 3d 6e 69 6c 29 | 20 5b 63 75 72 72 65 6e |eX!=nil)| [curren|
|00000940| 74 54 65 58 20 75 73 65 | 50 72 69 6e 74 65 72 3a |tTeX use|Printer:|
|00000950| 4e 4f 5d 3b 0a 09 72 65 | 74 75 72 6e 20 73 65 6c |NO];..re|turn sel|
|00000960| 66 3b 0a 7d 0a 0a 0a 0a | 2d 20 6e 65 77 54 65 58 |f;.}....|- newTeX|
|00000970| 69 74 65 6d 3a 20 6e 65 | 77 49 74 65 6d 0a 7b 0a |item: ne|wItem.{.|
|00000980| 09 63 68 61 72 20 62 75 | 66 66 65 72 5b 34 38 5d |.char bu|ffer[48]|
|00000990| 3b 0a 09 69 66 28 6e 65 | 77 49 74 65 6d 3d 3d 6e |;..if(ne|wItem==n|
|000009a0| 69 6c 29 20 72 65 74 75 | 72 6e 20 73 65 6c 66 3b |il) retu|rn self;|
|000009b0| 0a 0a 09 63 75 72 72 65 | 6e 74 54 65 58 3d 6e 65 |...curre|ntTeX=ne|
|000009c0| 77 49 74 65 6d 3b 0a 09 | 5b 69 6e 70 75 74 54 65 |wItem;..|[inputTe|
|000009d0| 78 74 20 73 65 6c 65 63 | 74 41 6c 6c 3a 20 73 65 |xt selec|tAll: se|
|000009e0| 6c 66 5d 3b 20 0a 09 5b | 69 6e 70 75 74 54 65 78 |lf]; ..[|inputTex|
|000009f0| 74 20 73 65 74 54 65 78 | 74 3a 5b 6e 65 77 49 74 |t setTex|t:[newIt|
|00000a00| 65 6d 20 74 65 78 74 5d | 5d 3b 0a 09 5b 69 6d 61 |em text]|];..[ima|
|00000a10| 67 65 56 69 65 77 20 6e | 65 77 49 6d 61 67 65 3a |geView n|ewImage:|
|00000a20| 5b 6e 65 77 49 74 65 6d | 20 69 6d 61 67 65 5d 5d |[newItem| image]]|
|00000a30| 3b 0a 0a 09 2f 2f 20 73 | 65 74 20 74 68 65 20 62 |;...// s|et the b|
|00000a40| 75 74 74 6f 6e 73 20 74 | 6f 20 72 65 66 6c 65 63 |uttons t|o reflec|
|00000a50| 74 20 74 68 65 20 70 72 | 69 6e 74 65 72 20 73 74 |t the pr|inter st|
|00000a60| 61 74 75 73 0a 09 69 66 | 28 5b 6e 65 77 49 74 65 |atus..if|([newIte|
|00000a70| 6d 20 75 73 65 50 72 69 | 6e 74 65 72 5d 29 20 5b |m usePri|nter]) [|
|00000a80| 73 65 6c 66 20 70 72 69 | 6e 74 65 72 3a 73 65 6c |self pri|nter:sel|
|00000a90| 66 5d 3b 0a 09 65 6c 73 | 65 20 5b 73 65 6c 66 20 |f];..els|e [self |
|00000aa0| 73 63 72 65 65 6e 3a 73 | 65 6c 66 5d 3b 0a 0a 09 |screen:s|elf];...|
|00000ab0| 2f 2f 20 61 64 6a 75 73 | 74 20 74 68 65 20 70 61 |// adjus|t the pa|
|00000ac0| 67 65 20 6e 75 6d 62 65 | 72 20 76 69 65 77 0a 09 |ge numbe|r view..|
|00000ad0| 73 70 72 69 6e 74 66 28 | 62 75 66 66 65 72 2c 22 |sprintf(|buffer,"|
|00000ae0| 25 75 20 6f 66 20 25 75 | 22 2c 5b 69 6d 61 67 65 |%u of %u|",[image|
|00000af0| 4c 69 73 74 20 69 6e 64 | 65 78 4f 66 3a 63 75 72 |List ind|exOf:cur|
|00000b00| 72 65 6e 74 54 65 58 5d | 2b 31 2c 0a 09 09 5b 69 |rentTeX]|+1,...[i|
|00000b10| 6d 61 67 65 4c 69 73 74 | 20 63 6f 75 6e 74 5d 29 |mageList| count])|
|00000b20| 3b 0a 09 5b 70 61 67 65 | 4e 75 6d 62 65 72 54 65 |;..[page|NumberTe|
|00000b30| 78 74 20 73 65 74 53 74 | 72 69 6e 67 56 61 6c 75 |xt setSt|ringValu|
|00000b40| 65 3a 62 75 66 66 65 72 | 5d 3b 0a 09 72 65 74 75 |e:buffer|];..retu|
|00000b50| 72 6e 20 73 65 6c 66 3b | 0a 7d 0a 0a 0a 0a 0a 2d |rn self;|.}.....-|
|00000b60| 20 64 6f 69 74 3a 73 65 | 6e 64 65 72 0a 7b 0a 09 | doit:se|nder.{..|
|00000b70| 63 68 61 72 20 62 75 66 | 66 65 72 5b 31 30 32 34 |char buf|fer[1024|
|00000b80| 5d 2c 20 74 6d 70 66 69 | 6c 65 6e 61 6d 65 5b 35 |], tmpfi|lename[5|
|00000b90| 31 32 5d 3b 0a 09 63 68 | 61 72 20 54 65 58 66 69 |12];..ch|ar TeXfi|
|00000ba0| 6c 65 6e 61 6d 65 5b 31 | 30 32 34 5d 3b 0a 09 63 |lename[1|024];..c|
|00000bb0| 68 61 72 20 65 70 73 66 | 69 6c 65 6e 61 6d 65 5b |har epsf|ilename[|
|00000bc0| 31 30 32 34 5d 3b 0a 09 | 63 68 61 72 20 54 65 58 |1024];..|char TeX|
|00000bd0| 62 75 66 66 65 72 5b 31 | 30 30 30 30 5d 3b 0a 09 |buffer[1|0000];..|
|00000be0| 63 68 61 72 20 73 63 72 | 61 74 63 68 5b 31 30 30 |char scr|atch[100|
|00000bf0| 30 5d 3b 0a 09 69 64 20 | 6e 65 77 69 6d 61 67 65 |0];..id |newimage|
|00000c00| 3b 0a 09 46 49 4c 45 20 | 2a 66 70 6f 75 74 3b 0a |;..FILE |*fpout;.|
|00000c10| 0a 09 63 68 64 69 72 28 | 22 2f 74 6d 70 22 29 3b |..chdir(|"/tmp");|
|00000c20| 0a 09 2f 2f 20 72 65 74 | 72 65 69 76 65 20 74 68 |..// ret|reive th|
|00000c30| 65 20 74 65 78 74 20 66 | 72 6f 6d 20 74 68 65 20 |e text f|rom the |
|00000c40| 74 65 78 74 20 6f 62 6a | 65 63 74 0a 09 5b 69 6e |text obj|ect..[in|
|00000c50| 70 75 74 54 65 78 74 20 | 09 67 65 74 53 75 62 73 |putText |.getSubs|
|00000c60| 74 72 69 6e 67 3a 28 63 | 68 61 72 20 2a 29 62 75 |tring:(c|har *)bu|
|00000c70| 66 66 65 72 0a 09 09 09 | 73 74 61 72 74 3a 28 69 |ffer....|start:(i|
|00000c80| 6e 74 29 30 20 0a 09 09 | 09 6c 65 6e 67 74 68 3a |nt)0 ...|.length:|
|00000c90| 28 69 6e 74 29 5b 69 6e | 70 75 74 54 65 78 74 20 |(int)[in|putText |
|00000ca0| 74 65 78 74 4c 65 6e 67 | 74 68 5d 5d 3b 0a 09 62 |textLeng|th]];..b|
|00000cb0| 75 66 66 65 72 5b 5b 69 | 6e 70 75 74 54 65 78 74 |uffer[[i|nputText|
|00000cc0| 20 74 65 78 74 4c 65 6e | 67 74 68 5d 5d 3d 27 5c | textLen|gth]]='\|
|00000cd0| 30 27 3b 0a 0a 09 69 66 | 28 63 75 72 72 65 6e 74 |0';...if|(current|
|00000ce0| 54 65 58 21 3d 6e 69 6c | 29 20 5b 63 75 72 72 65 |TeX!=nil|) [curre|
|00000cf0| 6e 74 54 65 58 20 74 65 | 78 74 3a 62 75 66 66 65 |ntTeX te|xt:buffe|
|00000d00| 72 5d 3b 0a 0a 0a 0a 09 | 2f 2f 20 72 75 6e 20 69 |r];.....|// run i|
|00000d10| 74 20 74 68 72 6f 75 67 | 68 20 54 65 58 0a 09 73 |t throug|h TeX..s|
|00000d20| 70 72 69 6e 74 66 28 54 | 65 58 62 75 66 66 65 72 |printf(T|eXbuffer|
|00000d30| 2c 22 5c 5c 64 6f 63 75 | 6d 65 6e 74 73 74 79 6c |,"\\docu|mentstyl|
|00000d40| 65 5b 74 69 6d 65 73 2c | 66 6c 65 71 6e 2c 31 32 |e[times,|fleqn,12|
|00000d50| 70 74 5d 7b 61 72 74 69 | 63 6c 65 7d 5c 6e 5c 0a |pt]{arti|cle}\n\.|
|00000d60| 5c 5c 6e 6f 6e 73 74 6f | 70 6d 6f 64 65 5c 6e 5c |\\nonsto|pmode\n\|
|00000d70| 0a 5c 5c 70 61 72 69 6e | 64 65 6e 74 3d 30 69 6e |.\\parin|dent=0in|
|00000d80| 5c 6e 5c 0a 5c 5c 6d 61 | 74 68 69 6e 64 65 6e 74 |\n\.\\ma|thindent|
|00000d90| 3d 30 69 6e 5c 6e 5c 0a | 5c 5c 70 61 67 65 73 74 |=0in\n\.|\\pagest|
|00000da0| 79 6c 65 7b 65 6d 70 74 | 79 7d 5c 6e 5c 0a 5c 5c |yle{empt|y}\n\.\\|
|00000db0| 62 65 67 69 6e 7b 64 6f | 63 75 6d 65 6e 74 7d 5c |begin{do|cument}\|
|00000dc0| 6e 5c 0a 25 73 5c 6e 5c | 0a 5c 5c 65 6e 64 7b 64 |n\.%s\n\|.\\end{d|
|00000dd0| 6f 63 75 6d 65 6e 74 7d | 5c 6e 22 2c 62 75 66 66 |ocument}|\n",buff|
|00000de0| 65 72 29 3b 0a 0a 09 74 | 6d 70 6e 61 6d 28 74 6d |er);...t|mpnam(tm|
|00000df0| 70 66 69 6c 65 6e 61 6d | 65 29 3b 0a 09 73 74 72 |pfilenam|e);..str|
|00000e00| 63 70 79 28 54 65 58 66 | 69 6c 65 6e 61 6d 65 2c |cpy(TeXf|ilename,|
|00000e10| 74 6d 70 66 69 6c 65 6e | 61 6d 65 29 3b 0a 09 73 |tmpfilen|ame);..s|
|00000e20| 74 72 63 61 74 28 54 65 | 58 66 69 6c 65 6e 61 6d |trcat(Te|Xfilenam|
|00000e30| 65 2c 22 2e 74 65 78 22 | 29 3b 0a 09 66 70 6f 75 |e,".tex"|);..fpou|
|00000e40| 74 20 3d 20 66 6f 70 65 | 6e 28 54 65 58 66 69 6c |t = fope|n(TeXfil|
|00000e50| 65 6e 61 6d 65 2c 22 77 | 22 29 3b 0a 09 66 70 72 |ename,"w|");..fpr|
|00000e60| 69 6e 74 66 28 66 70 6f | 75 74 2c 22 25 73 22 2c |intf(fpo|ut,"%s",|
|00000e70| 54 65 58 62 75 66 66 65 | 72 29 3b 0a 09 66 63 6c |TeXbuffe|r);..fcl|
|00000e80| 6f 73 65 28 66 70 6f 75 | 74 29 3b 0a 09 73 70 72 |ose(fpou|t);..spr|
|00000e90| 69 6e 74 66 28 73 63 72 | 61 74 63 68 2c 22 6c 61 |intf(scr|atch,"la|
|00000ea0| 74 65 78 20 25 73 22 2c | 54 65 58 66 69 6c 65 6e |tex %s",|TeXfilen|
|00000eb0| 61 6d 65 29 3b 0a 09 73 | 79 73 74 65 6d 28 73 63 |ame);..s|ystem(sc|
|00000ec0| 72 61 74 63 68 29 3b 20 | 0a 0a 09 2f 2f 20 72 75 |ratch); |...// ru|
|00000ed0| 6e 20 69 74 20 74 68 72 | 6f 75 67 68 20 64 76 69 |n it thr|ough dvi|
|00000ee0| 70 73 0a 09 73 74 72 63 | 70 79 28 65 70 73 66 69 |ps..strc|py(epsfi|
|00000ef0| 6c 65 6e 61 6d 65 2c 74 | 6d 70 66 69 6c 65 6e 61 |lename,t|mpfilena|
|00000f00| 6d 65 29 3b 0a 09 73 74 | 72 63 61 74 28 65 70 73 |me);..st|rcat(eps|
|00000f10| 66 69 6c 65 6e 61 6d 65 | 2c 22 2e 65 70 73 22 29 |filename|,".eps")|
|00000f20| 3b 0a 09 73 70 72 69 6e | 74 66 28 73 63 72 61 74 |;..sprin|tf(scrat|
|00000f30| 63 68 2c 22 64 76 69 70 | 73 20 2d 78 20 32 30 30 |ch,"dvip|s -x 200|
|00000f40| 30 20 2d 45 20 2d 66 20 | 2d 44 20 25 64 20 25 73 |0 -E -f |-D %d %s|
|00000f50| 2e 64 76 69 20 3e 20 25 | 73 22 2c 0a 09 09 28 70 |.dvi > %|s",...(p|
|00000f60| 72 69 6e 74 65 72 29 3f | 34 30 30 3a 37 32 2c 74 |rinter)?|400:72,t|
|00000f70| 6d 70 66 69 6c 65 6e 61 | 6d 65 2c 65 70 73 66 69 |mpfilena|me,epsfi|
|00000f80| 6c 65 6e 61 6d 65 29 3b | 20 0a 09 73 79 73 74 65 |lename);| ..syste|
|00000f90| 6d 28 73 63 72 61 74 63 | 68 29 3b 0a 0a 09 2f 2f |m(scratc|h);...//|
|00000fa0| 20 72 65 74 72 65 69 76 | 65 20 74 68 65 20 69 6d | retreiv|e the im|
|00000fb0| 61 67 65 20 61 6e 64 20 | 67 65 74 20 69 74 20 64 |age and |get it d|
|00000fc0| 69 73 70 6c 61 79 65 64 | 0a 09 6e 65 77 69 6d 61 |isplayed|..newima|
|00000fd0| 67 65 20 3d 20 5b 5b 4e | 58 49 6d 61 67 65 20 61 |ge = [[N|XImage a|
|00000fe0| 6c 6c 6f 63 5d 20 69 6e | 69 74 5d 3b 0a 09 5b 6e |lloc] in|it];..[n|
|00000ff0| 65 77 69 6d 61 67 65 20 | 6c 6f 61 64 46 72 6f 6d |ewimage |loadFrom|
|00001000| 46 69 6c 65 3a 20 65 70 | 73 66 69 6c 65 6e 61 6d |File: ep|sfilenam|
|00001010| 65 5d 3b 0a 09 2f 2f 5b | 6e 65 77 69 6d 61 67 65 |e];..//[|newimage|
|00001020| 20 73 65 74 45 50 53 55 | 73 65 64 4f 6e 52 65 73 | setEPSU|sedOnRes|
|00001030| 6f 6c 75 74 69 6f 6e 4d | 69 73 6d 61 74 63 68 3a |olutionM|ismatch:|
|00001040| 20 59 45 53 5d 3b 0a 20 | 20 20 20 09 5b 6e 65 77 | YES];. |   .[new|
|00001050| 69 6d 61 67 65 20 73 65 | 74 44 61 74 61 52 65 74 |image se|tDataRet|
|00001060| 61 69 6e 65 64 3a 59 45 | 53 5d 3b 0a 20 20 20 20 |ained:YE|S];.    |
|00001070| 20 20 20 20 5b 6e 65 77 | 69 6d 61 67 65 20 73 65 |    [new|image se|
|00001080| 74 53 63 61 6c 61 62 6c | 65 3a 59 45 53 5d 3b 0a |tScalabl|e:YES];.|
|00001090| 0a 09 5b 69 6d 61 67 65 | 56 69 65 77 20 6e 65 77 |..[image|View new|
|000010a0| 49 6d 61 67 65 3a 20 6e | 65 77 69 6d 61 67 65 5d |Image: n|ewimage]|
|000010b0| 3b 0a 0a 09 69 66 28 63 | 75 72 72 65 6e 74 54 65 |;...if(c|urrentTe|
|000010c0| 58 21 3d 6e 69 6c 29 20 | 5b 63 75 72 72 65 6e 74 |X!=nil) |[current|
|000010d0| 54 65 58 20 69 6d 61 67 | 65 3a 20 6e 65 77 69 6d |TeX imag|e: newim|
|000010e0| 61 67 65 5d 3b 0a 0a 20 | 20 20 20 72 65 74 75 72 |age];.. |   retur|
|000010f0| 6e 20 73 65 6c 66 3b 0a | 7d 0a 0a 2d 20 63 75 74 |n self;.|}..- cut|
|00001100| 3a 20 73 65 6e 64 65 72 | 0a 7b 0a 09 72 65 74 75 |: sender|.{..retu|
|00001110| 72 6e 20 73 65 6c 66 3b | 0a 09 5b 73 65 6c 66 20 |rn self;|..[self |
|00001120| 63 6f 70 79 3a 20 73 65 | 6e 64 65 72 5d 3b 0a 09 |copy: se|nder];..|
|00001130| 5b 73 65 6c 66 20 72 65 | 6d 6f 76 65 3a 20 73 65 |[self re|move: se|
|00001140| 6e 64 65 72 5d 3b 0a 09 | 72 65 74 75 72 6e 20 73 |nder];..|return s|
|00001150| 65 6c 66 3b 0a 7d 0a 2d | 20 63 6f 70 79 3a 20 73 |elf;.}.-| copy: s|
|00001160| 65 6e 64 65 72 0a 7b 0a | 09 5b 69 6d 61 67 65 56 |ender.{.|.[imageV|
|00001170| 69 65 77 20 63 6f 70 79 | 3a 20 73 65 6c 66 5d 3b |iew copy|: self];|
|00001180| 0a 09 72 65 74 75 72 6e | 20 73 65 6c 66 3b 0a 7d |..return| self;.}|
|00001190| 0a 0a 2d 20 72 65 6d 6f | 76 65 3a 20 73 65 6e 64 |..- remo|ve: send|
|000011a0| 65 72 0a 7b 0a 09 69 6e | 74 20 69 3b 0a 09 69 66 |er.{..in|t i;..if|
|000011b0| 28 63 75 72 72 65 6e 74 | 54 65 58 3d 3d 6e 69 6c |(current|TeX==nil|
|000011c0| 29 20 72 65 74 75 72 6e | 20 73 65 6c 66 3b 20 2f |) return| self; /|
|000011d0| 2f 20 73 68 6f 75 6c 64 | 6e 27 74 20 62 65 20 61 |/ should|n't be a|
|000011e0| 62 6c 65 20 74 6f 20 68 | 61 70 70 65 6e 0a 09 65 |ble to h|appen..e|
|000011f0| 6c 73 65 20 69 20 3d 20 | 5b 69 6d 61 67 65 4c 69 |lse i = |[imageLi|
|00001200| 73 74 20 69 6e 64 65 78 | 4f 66 3a 20 63 75 72 72 |st index|Of: curr|
|00001210| 65 6e 74 54 65 58 5d 3b | 0a 09 5b 69 6d 61 67 65 |entTeX];|..[image|
|00001220| 4c 69 73 74 20 72 65 6d | 6f 76 65 4f 62 6a 65 63 |List rem|oveObjec|
|00001230| 74 3a 63 75 72 72 65 6e | 74 54 65 58 5d 3b 0a 09 |t:curren|tTeX];..|
|00001240| 69 66 28 5b 69 6d 61 67 | 65 4c 69 73 74 20 63 6f |if([imag|eList co|
|00001250| 75 6e 74 5d 3d 3d 30 29 | 20 7b 0a 09 09 5b 73 65 |unt]==0)| {...[se|
|00001260| 6c 66 20 69 6e 73 65 72 | 74 3a 20 73 65 6c 66 5d |lf inser|t: self]|
|00001270| 3b 0a 09 7d 20 65 6c 73 | 65 20 7b 0a 09 09 69 66 |;..} els|e {...if|
|00001280| 28 69 3e 3d 28 5b 69 6d | 61 67 65 4c 69 73 74 20 |(i>=([im|ageList |
|00001290| 63 6f 75 6e 74 5d 2d 31 | 29 20 26 26 20 69 3e 30 |count]-1|) && i>0|
|000012a0| 29 20 69 2d 2d 3b 0a 09 | 09 5b 73 65 6c 66 20 6e |) i--;..|.[self n|
|000012b0| 65 77 54 65 58 69 74 65 | 6d 3a 5b 69 6d 61 67 65 |ewTeXite|m:[image|
|000012c0| 4c 69 73 74 20 6f 62 6a | 65 63 74 41 74 3a 69 5d |List obj|ectAt:i]|
|000012d0| 5d 3b 0a 09 7d 0a 09 72 | 65 74 75 72 6e 20 73 65 |];..}..r|eturn se|
|000012e0| 6c 66 3b 0a 7d 0a 0a 2d | 20 6e 65 77 54 65 78 74 |lf;.}..-| newText|
|000012f0| 3a 28 63 68 61 72 2a 29 | 6e 65 77 54 65 78 74 0a |:(char*)|newText.|
|00001300| 7b 0a 09 5b 69 6e 70 75 | 74 54 65 78 74 20 73 65 |{..[inpu|tText se|
|00001310| 6c 65 63 74 41 6c 6c 3a | 20 73 65 6c 66 5d 3b 20 |lectAll:| self]; |
|00001320| 0a 09 5b 69 6e 70 75 74 | 54 65 78 74 20 73 65 74 |..[input|Text set|
|00001330| 54 65 78 74 3a 6e 65 77 | 54 65 78 74 5d 3b 0a 09 |Text:new|Text];..|
|00001340| 2f 2f 70 72 69 6e 74 66 | 28 22 6e 65 77 20 74 65 |//printf|("new te|
|00001350| 78 74 20 69 73 20 25 73 | 5c 6e 22 2c 6e 65 77 54 |xt is %s|\n",newT|
|00001360| 65 78 74 29 3b 0a 09 2f | 2f 5b 69 6e 70 75 74 54 |ext);../|/[inputT|
|00001370| 65 78 74 20 75 70 64 61 | 74 65 5d 3b 0a 09 72 65 |ext upda|te];..re|
|00001380| 74 75 72 6e 20 73 65 6c | 66 3b 0a 7d 0a 0a 2d 20 |turn sel|f;.}..- |
|00001390| 75 70 3a 20 73 65 6e 64 | 65 72 0a 7b 0a 09 75 6e |up: send|er.{..un|
|000013a0| 73 69 67 6e 65 64 20 69 | 6e 74 20 69 3b 0a 09 69 |signed i|nt i;..i|
|000013b0| 20 3d 20 5b 69 6d 61 67 | 65 4c 69 73 74 20 69 6e | = [imag|eList in|
|000013c0| 64 65 78 4f 66 3a 20 63 | 75 72 72 65 6e 74 54 65 |dexOf: c|urrentTe|
|000013d0| 58 5d 3b 0a 09 69 66 28 | 69 3e 3d 28 5b 69 6d 61 |X];..if(|i>=([ima|
|000013e0| 67 65 4c 69 73 74 20 63 | 6f 75 6e 74 5d 2d 31 29 |geList c|ount]-1)|
|000013f0| 29 20 7b 0a 09 09 72 65 | 74 75 72 6e 20 73 65 6c |) {...re|turn sel|
|00001400| 66 3b 0a 09 7d 3b 0a 09 | 69 2b 2b 3b 0a 09 5b 73 |f;..};..|i++;..[s|
|00001410| 65 6c 66 20 6e 65 77 54 | 65 58 69 74 65 6d 3a 20 |elf newT|eXitem: |
|00001420| 5b 69 6d 61 67 65 4c 69 | 73 74 20 6f 62 6a 65 63 |[imageLi|st objec|
|00001430| 74 41 74 3a 20 69 5d 5d | 3b 0a 09 72 65 74 75 72 |tAt: i]]|;..retur|
|00001440| 6e 20 73 65 6c 66 3b 0a | 7d 0a 0a 2d 20 64 6f 77 |n self;.|}..- dow|
|00001450| 6e 3a 20 73 65 6e 64 65 | 72 0a 7b 0a 09 75 6e 73 |n: sende|r.{..uns|
|00001460| 69 67 6e 65 64 20 69 6e | 74 20 69 3b 0a 09 69 20 |igned in|t i;..i |
|00001470| 3d 20 5b 69 6d 61 67 65 | 4c 69 73 74 20 69 6e 64 |= [image|List ind|
|00001480| 65 78 4f 66 3a 20 63 75 | 72 72 65 6e 74 54 65 58 |exOf: cu|rrentTeX|
|00001490| 5d 3b 0a 09 69 66 28 69 | 3d 3d 30 29 20 7b 0a 09 |];..if(i|==0) {..|
|000014a0| 09 72 65 74 75 72 6e 20 | 73 65 6c 66 3b 0a 09 7d |.return |self;..}|
|000014b0| 0a 09 69 2d 2d 3b 0a 09 | 5b 73 65 6c 66 20 6e 65 |..i--;..|[self ne|
|000014c0| 77 54 65 58 69 74 65 6d | 3a 20 5b 69 6d 61 67 65 |wTeXitem|: [image|
|000014d0| 4c 69 73 74 20 6f 62 6a | 65 63 74 41 74 3a 20 69 |List obj|ectAt: i|
|000014e0| 5d 5d 3b 0a 09 72 65 74 | 75 72 6e 20 73 65 6c 66 |]];..ret|urn self|
|000014f0| 3b 0a 7d 0a 0a 2d 20 69 | 6e 73 65 72 74 3a 20 73 |;.}..- i|nsert: s|
|00001500| 65 6e 64 65 72 0a 7b 0a | 09 69 64 20 6e 65 77 54 |ender.{.|.id newT|
|00001510| 65 58 3b 0a 09 75 6e 73 | 69 67 6e 65 64 20 69 6e |eX;..uns|igned in|
|00001520| 74 20 69 3b 0a 0a 09 6e | 65 77 54 65 58 20 3d 20 |t i;...n|ewTeX = |
|00001530| 5b 5b 54 65 58 69 74 65 | 6d 20 61 6c 6c 6f 63 5d |[[TeXite|m alloc]|
|00001540| 20 69 6e 69 74 5d 3b 0a | 09 5b 5b 6e 65 77 54 65 | init];.|.[[newTe|
|00001550| 58 20 74 65 78 74 3a 20 | 4e 55 4c 4c 5d 20 69 6d |X text: |NULL] im|
|00001560| 61 67 65 3a 20 6e 69 6c | 5d 3b 0a 09 0a 09 69 20 |age: nil|];....i |
|00001570| 3d 20 5b 69 6d 61 67 65 | 4c 69 73 74 20 69 6e 64 |= [image|List ind|
|00001580| 65 78 4f 66 3a 20 63 75 | 72 72 65 6e 74 54 65 58 |exOf: cu|rrentTeX|
|00001590| 5d 3b 0a 09 69 66 28 69 | 3d 3d 4e 58 5f 4e 4f 54 |];..if(i|==NX_NOT|
|000015a0| 5f 49 4e 5f 4c 49 53 54 | 29 20 69 3d 30 3b 0a 09 |_IN_LIST|) i=0;..|
|000015b0| 5b 69 6d 61 67 65 4c 69 | 73 74 20 69 6e 73 65 72 |[imageLi|st inser|
|000015c0| 74 4f 62 6a 65 63 74 3a | 20 6e 65 77 54 65 58 20 |tObject:| newTeX |
|000015d0| 61 74 3a 20 69 5d 3b 20 | 2f 2f 20 69 6e 73 65 72 |at: i]; |// inser|
|000015e0| 74 20 61 74 20 74 68 65 | 20 73 70 6f 74 0a 09 5b |t at the| spot..[|
|000015f0| 73 65 6c 66 20 6e 65 77 | 54 65 58 69 74 65 6d 3a |self new|TeXitem:|
|00001600| 20 6e 65 77 54 65 58 5d | 3b 0a 09 72 65 74 75 72 | newTeX]|;..retur|
|00001610| 6e 20 73 65 6c 66 3b 0a | 7d 0a 0a 0a 2d 20 69 6e |n self;.|}...- in|
|00001620| 66 6f 3a 73 65 6e 64 65 | 72 0a 7b 0a 09 69 66 28 |fo:sende|r.{..if(|
|00001630| 21 69 6e 66 6f 50 61 6e | 65 6c 29 20 7b 0a 09 09 |!infoPan|el) {...|
|00001640| 5b 4e 58 41 70 70 20 6c | 6f 61 64 4e 69 62 53 65 |[NXApp l|oadNibSe|
|00001650| 63 74 69 6f 6e 3a 20 22 | 49 6e 66 6f 2e 6e 69 62 |ction: "|Info.nib|
|00001660| 22 20 6f 77 6e 65 72 3a | 73 65 6c 66 5d 3b 0a 09 |" owner:|self];..|
|00001670| 7d 0a 09 5b 69 6e 66 6f | 50 61 6e 65 6c 20 6d 61 |}..[info|Panel ma|
|00001680| 6b 65 4b 65 79 41 6e 64 | 4f 72 64 65 72 46 72 6f |keKeyAnd|OrderFro|
|00001690| 6e 74 3a 20 73 65 6c 66 | 5d 3b 0a 09 72 65 74 75 |nt: self|];..retu|
|000016a0| 72 6e 20 73 65 6c 66 3b | 0a 7d 0a 0a 0a 0a 2d 20 |rn self;|.}....- |
|000016b0| 6f 70 65 6e 3a 20 73 65 | 6e 64 65 72 0a 7b 0a 09 |open: se|nder.{..|
|000016c0| 69 64 20 6f 70 65 6e 50 | 61 6e 65 6c 3d 5b 4f 70 |id openP|anel=[Op|
|000016d0| 65 6e 50 61 6e 65 6c 20 | 6e 65 77 5d 3b 0a 09 63 |enPanel |new];..c|
|000016e0| 6f 6e 73 74 20 63 68 61 | 72 20 2a 6e 65 77 66 69 |onst cha|r *newfi|
|000016f0| 6c 65 6e 61 6d 65 3b 0a | 09 63 6f 6e 73 74 20 63 |lename;.|.const c|
|00001700| 68 61 72 20 2a 74 79 70 | 65 73 5b 5d 3d 7b 22 74 |har *typ|es[]={"t|
|00001710| 65 78 66 69 67 22 2c 4e | 55 4c 4c 7d 3b 0a 0a 09 |exfig",N|ULL};...|
|00001720| 5b 6f 70 65 6e 50 61 6e | 65 6c 20 61 6c 6c 6f 77 |[openPan|el allow|
|00001730| 4d 75 6c 74 69 70 6c 65 | 46 69 6c 65 73 3a 20 4e |Multiple|Files: N|
|00001740| 4f 5d 3b 0a 09 69 66 28 | 5b 6f 70 65 6e 50 61 6e |O];..if(|[openPan|
|00001750| 65 6c 20 72 75 6e 4d 6f | 64 61 6c 46 6f 72 54 79 |el runMo|dalForTy|
|00001760| 70 65 73 3a 20 74 79 70 | 65 73 5d 20 26 26 20 28 |pes: typ|es] && (|
|00001770| 6e 65 77 66 69 6c 65 6e | 61 6d 65 20 3d 20 5b 6f |newfilen|ame = [o|
|00001780| 70 65 6e 50 61 6e 65 6c | 20 66 69 6c 65 6e 61 6d |penPanel| filenam|
|00001790| 65 5d 29 29 20 7b 0a 09 | 09 69 66 28 21 5b 73 65 |e])) {..|.if(![se|
|000017a0| 6c 66 20 6f 70 65 6e 46 | 69 6c 65 3a 6e 65 77 66 |lf openF|ile:newf|
|000017b0| 69 6c 65 6e 61 6d 65 5d | 29 0a 09 09 09 4e 58 52 |ilename]|)....NXR|
|000017c0| 75 6e 41 6c 65 72 74 50 | 61 6e 65 6c 28 22 4f 70 |unAlertP|anel("Op|
|000017d0| 65 6e 20 45 72 72 6f 72 | 22 2c 22 43 61 6e 27 74 |en Error|","Can't|
|000017e0| 20 6f 70 65 6e 20 66 69 | 6c 65 20 25 73 20 66 6f | open fi|le %s fo|
|000017f0| 72 20 72 65 61 64 69 6e | 67 22 2c 0a 09 09 09 09 |r readin|g",.....|
|00001800| 22 43 6f 6e 74 69 6e 75 | 65 22 2c 4e 55 4c 4c 2c |"Continu|e",NULL,|
|00001810| 4e 55 4c 4c 2c 66 69 6c | 65 6e 61 6d 65 29 3b 0a |NULL,fil|ename);.|
|00001820| 0a 09 7d 0a 09 72 65 74 | 75 72 6e 20 73 65 6c 66 |..}..ret|urn self|
|00001830| 3b 20 0a 7d 0a 0a 0a 2d | 20 28 42 4f 4f 4c 29 6f |; .}...-| (BOOL)o|
|00001840| 70 65 6e 46 69 6c 65 3a | 28 63 6f 6e 73 74 20 63 |penFile:|(const c|
|00001850| 68 61 72 2a 29 70 61 74 | 68 6e 61 6d 65 0a 7b 0a |har*)pat|hname.{.|
|00001860| 09 4e 58 54 79 70 65 64 | 53 74 72 65 61 6d 20 2a |.NXTyped|Stream *|
|00001870| 74 79 70 65 64 53 74 72 | 65 61 6d 3b 0a 0a 09 73 |typedStr|eam;...s|
|00001880| 74 72 63 70 79 28 66 69 | 6c 65 6e 61 6d 65 2c 70 |trcpy(fi|lename,p|
|00001890| 61 74 68 6e 61 6d 65 29 | 3b 0a 09 69 66 28 21 28 |athname)|;..if(!(|
|000018a0| 74 79 70 65 64 53 74 72 | 65 61 6d 3d 4e 58 4f 70 |typedStr|eam=NXOp|
|000018b0| 65 6e 54 79 70 65 64 53 | 74 72 65 61 6d 46 6f 72 |enTypedS|treamFor|
|000018c0| 46 69 6c 65 28 70 61 74 | 68 6e 61 6d 65 2c 4e 58 |File(pat|hname,NX|
|000018d0| 5f 52 45 41 44 4f 4e 4c | 59 29 29 29 20 7b 0a 09 |_READONL|Y))) {..|
|000018e0| 09 09 09 72 65 74 75 72 | 6e 20 4e 4f 3b 0a 09 7d |...retur|n NO;..}|
|000018f0| 09 09 0a 09 69 66 28 69 | 6d 61 67 65 4c 69 73 74 |....if(i|mageList|
|00001900| 21 3d 6e 69 6c 29 20 5b | 69 6d 61 67 65 4c 69 73 |!=nil) [|imageLis|
|00001910| 74 20 66 72 65 65 5d 3b | 0a 09 69 6d 61 67 65 4c |t free];|..imageL|
|00001920| 69 73 74 20 3d 20 4e 58 | 52 65 61 64 4f 62 6a 65 |ist = NX|ReadObje|
|00001930| 63 74 28 74 79 70 65 64 | 53 74 72 65 61 6d 29 3b |ct(typed|Stream);|
|00001940| 0a 09 69 66 28 5b 69 6d | 61 67 65 4c 69 73 74 20 |..if([im|ageList |
|00001950| 63 6f 75 6e 74 5d 3d 3d | 30 29 20 5b 73 65 6c 66 |count]==|0) [self|
|00001960| 20 69 6e 73 65 72 74 3a | 20 73 65 6c 66 5d 3b 0a | insert:| self];.|
|00001970| 09 65 6c 73 65 20 5b 73 | 65 6c 66 20 6e 65 77 54 |.else [s|elf newT|
|00001980| 65 58 69 74 65 6d 3a 5b | 69 6d 61 67 65 4c 69 73 |eXitem:[|imageLis|
|00001990| 74 20 6f 62 6a 65 63 74 | 41 74 3a 20 30 5d 5d 3b |t object|At: 0]];|
|000019a0| 0a 09 5b 5b 69 6d 61 67 | 65 56 69 65 77 20 77 69 |..[[imag|eView wi|
|000019b0| 6e 64 6f 77 5d 20 73 65 | 74 54 69 74 6c 65 41 73 |ndow] se|tTitleAs|
|000019c0| 46 69 6c 65 6e 61 6d 65 | 3a 70 61 74 68 6e 61 6d |Filename|:pathnam|
|000019d0| 65 5d 3b 0a 09 72 65 74 | 75 72 6e 20 59 45 53 3b |e];..ret|urn YES;|
|000019e0| 0a 7d 0a 0a 2d 20 73 61 | 76 65 3a 20 73 65 6e 64 |.}..- sa|ve: send|
|000019f0| 65 72 0a 7b 0a 09 4e 58 | 54 79 70 65 64 53 74 72 |er.{..NX|TypedStr|
|00001a00| 65 61 6d 20 2a 74 79 70 | 65 64 53 74 72 65 61 6d |eam *typ|edStream|
|00001a10| 3b 0a 0a 09 69 66 28 21 | 73 74 72 6c 65 6e 28 66 |;...if(!|strlen(f|
|00001a20| 69 6c 65 6e 61 6d 65 29 | 29 20 5b 73 65 6c 66 20 |ilename)|) [self |
|00001a30| 73 61 76 65 41 73 3a 73 | 65 6c 66 5d 3b 0a 0a 09 |saveAs:s|elf];...|
|00001a40| 69 66 28 21 28 74 79 70 | 65 64 53 74 72 65 61 6d |if(!(typ|edStream|
|00001a50| 20 3d 20 4e 58 4f 70 65 | 6e 54 79 70 65 64 53 74 | = NXOpe|nTypedSt|
|00001a60| 72 65 61 6d 46 6f 72 46 | 69 6c 65 28 66 69 6c 65 |reamForF|ile(file|
|00001a70| 6e 61 6d 65 2c 4e 58 5f | 57 52 49 54 45 4f 4e 4c |name,NX_|WRITEONL|
|00001a80| 59 29 29 29 20 7b 0a 09 | 09 4e 58 52 75 6e 41 6c |Y))) {..|.NXRunAl|
|00001a90| 65 72 74 50 61 6e 65 6c | 28 22 53 61 76 65 20 45 |ertPanel|("Save E|
|00001aa0| 72 72 6f 72 22 2c 22 43 | 61 6e 6e 6f 74 20 6f 70 |rror","C|annot op|
|00001ab0| 65 6e 20 66 69 6c 65 20 | 25 73 20 66 6f 72 20 77 |en file |%s for w|
|00001ac0| 72 69 74 69 6e 67 22 2c | 0a 09 09 09 22 43 6f 6e |riting",|...."Con|
|00001ad0| 74 69 6e 75 65 22 2c 4e | 55 4c 4c 2c 4e 55 4c 4c |tinue",N|ULL,NULL|
|00001ae0| 2c 66 69 6c 65 6e 61 6d | 65 29 3b 0a 09 09 72 65 |,filenam|e);...re|
|00001af0| 74 75 72 6e 20 73 65 6c | 66 3b 0a 09 7d 0a 09 4e |turn sel|f;..}..N|
|00001b00| 58 57 72 69 74 65 4f 62 | 6a 65 63 74 28 74 79 70 |XWriteOb|ject(typ|
|00001b10| 65 64 53 74 72 65 61 6d | 2c 69 6d 61 67 65 4c 69 |edStream|,imageLi|
|00001b20| 73 74 29 3b 0a 09 4e 58 | 43 6c 6f 73 65 54 79 70 |st);..NX|CloseTyp|
|00001b30| 65 64 53 74 72 65 61 6d | 28 74 79 70 65 64 53 74 |edStream|(typedSt|
|00001b40| 72 65 61 6d 29 3b 0a 09 | 72 65 74 75 72 6e 20 73 |ream);..|return s|
|00001b50| 65 6c 66 3b 0a 7d 0a 0a | 2d 20 73 61 76 65 41 73 |elf;.}..|- saveAs|
|00001b60| 3a 73 65 6e 64 65 72 0a | 7b 0a 09 69 64 20 73 61 |:sender.|{..id sa|
|00001b70| 76 65 50 61 6e 65 6c 3d | 5b 53 61 76 65 50 61 6e |vePanel=|[SavePan|
|00001b80| 65 6c 20 6e 65 77 5d 3b | 0a 0a 09 5b 73 61 76 65 |el new];|...[save|
|00001b90| 50 61 6e 65 6c 20 73 65 | 74 52 65 71 75 69 72 65 |Panel se|tRequire|
|00001ba0| 64 46 69 6c 65 54 79 70 | 65 3a 20 22 74 65 78 66 |dFileTyp|e: "texf|
|00001bb0| 69 67 22 5d 3b 0a 09 69 | 66 28 5b 73 61 76 65 50 |ig"];..i|f([saveP|
|00001bc0| 61 6e 65 6c 20 72 75 6e | 4d 6f 64 61 6c 5d 29 20 |anel run|Modal]) |
|00001bd0| 7b 0a 09 09 73 74 72 63 | 70 79 28 66 69 6c 65 6e |{...strc|py(filen|
|00001be0| 61 6d 65 2c 5b 73 61 76 | 65 50 61 6e 65 6c 20 66 |ame,[sav|ePanel f|
|00001bf0| 69 6c 65 6e 61 6d 65 5d | 29 3b 0a 09 09 5b 5b 69 |ilename]|);...[[i|
|00001c00| 6d 61 67 65 56 69 65 77 | 20 77 69 6e 64 6f 77 5d |mageView| window]|
|00001c10| 20 73 65 74 54 69 74 6c | 65 41 73 46 69 6c 65 6e | setTitl|eAsFilen|
|00001c20| 61 6d 65 3a 66 69 6c 65 | 6e 61 6d 65 5d 3b 0a 09 |ame:file|name];..|
|00001c30| 09 5b 73 65 6c 66 20 73 | 61 76 65 3a 73 65 6c 66 |.[self s|ave:self|
|00001c40| 5d 3b 0a 09 7d 0a 09 72 | 65 74 75 72 6e 20 73 65 |];..}..r|eturn se|
|00001c50| 6c 66 3b 0a 7d 0a 0a 0a | 73 74 61 74 69 63 20 42 |lf;.}...|static B|
|00001c60| 4f 4f 4c 20 68 61 76 65 | 4e 6f 74 69 63 65 64 3d |OOL have|Noticed=|
|00001c70| 4e 4f 3b 0a 2d 20 70 72 | 65 66 65 72 65 6e 63 65 |NO;.- pr|eference|
|00001c80| 73 3a 20 73 65 6e 64 65 | 72 0a 7b 0a 09 69 66 28 |s: sende|r.{..if(|
|00001c90| 21 70 72 65 66 50 61 6e | 65 6c 29 20 7b 0a 09 09 |!prefPan|el) {...|
|00001ca0| 70 72 65 66 50 61 6e 65 | 6c 20 3d 20 5b 4e 58 41 |prefPane|l = [NXA|
|00001cb0| 70 70 20 6c 6f 61 64 4e | 69 62 53 65 63 74 69 6f |pp loadN|ibSectio|
|00001cc0| 6e 3a 20 22 50 72 65 66 | 65 72 65 6e 63 65 73 2e |n: "Pref|erences.|
|00001cd0| 6e 69 62 22 20 6f 77 6e | 65 72 3a 73 65 6c 66 5d |nib" own|er:self]|
|00001ce0| 3b 0a 09 7d 0a 09 5b 70 | 72 65 66 50 61 6e 65 6c |;..}..[p|refPanel|
|00001cf0| 20 6d 61 6b 65 4b 65 79 | 41 6e 64 4f 72 64 65 72 | makeKey|AndOrder|
|00001d00| 46 72 6f 6e 74 3a 20 73 | 65 6c 66 5d 3b 0a 09 69 |Front: s|elf];..i|
|00001d10| 66 28 21 68 61 76 65 4e | 6f 74 69 63 65 64 29 20 |f(!haveN|oticed) |
|00001d20| 7b 0a 09 09 4e 58 52 75 | 6e 41 6c 65 72 74 50 61 |{...NXRu|nAlertPa|
|00001d30| 6e 65 6c 28 22 50 72 65 | 66 65 72 65 6e 63 65 73 |nel("Pre|ferences|
|00001d40| 20 4e 6f 74 69 63 65 22 | 2c 22 54 68 65 20 50 72 | Notice"|,"The Pr|
|00001d50| 65 66 65 72 65 6e 63 65 | 73 20 70 61 6e 65 6c 20 |eference|s panel |
|00001d60| 68 61 73 20 6e 6f 74 20 | 62 65 65 6e 20 61 63 74 |has not |been act|
|00001d70| 69 76 61 74 65 64 20 66 | 6f 72 20 75 73 65 22 2c |ivated f|or use",|
|00001d80| 22 43 6f 6e 74 69 6e 75 | 65 22 2c 4e 55 4c 4c 2c |"Continu|e",NULL,|
|00001d90| 4e 55 4c 4c 29 3b 0a 09 | 09 68 61 76 65 4e 6f 74 |NULL);..|.haveNot|
|00001da0| 69 63 65 64 3d 59 45 53 | 3b 0a 09 7d 0a 09 72 65 |iced=YES|;..}..re|
|00001db0| 74 75 72 6e 20 73 65 6c | 66 3b 0a 7d 0a 0a 0a 2d |turn sel|f;.}...-|
|00001dc0| 20 28 69 6e 74 29 61 70 | 70 3a 73 65 6e 64 65 72 | (int)ap|p:sender|
|00001dd0| 20 6f 70 65 6e 46 69 6c | 65 3a 28 63 6f 6e 73 74 | openFil|e:(const|
|00001de0| 20 63 68 61 72 20 2a 29 | 6e 65 77 66 69 6c 65 6e | char *)|newfilen|
|00001df0| 61 6d 65 20 74 79 70 65 | 3a 28 63 6f 6e 73 74 20 |ame type|:(const |
|00001e00| 63 68 61 72 20 2a 29 61 | 54 79 70 65 0a 7b 0a 09 |char *)a|Type.{..|
|00001e10| 42 4f 4f 4c 20 72 65 70 | 6c 79 3b 0a 09 72 65 70 |BOOL rep|ly;..rep|
|00001e20| 6c 79 20 3d 20 20 5b 73 | 65 6c 66 20 6f 70 65 6e |ly =  [s|elf open|
|00001e30| 46 69 6c 65 3a 6e 65 77 | 66 69 6c 65 6e 61 6d 65 |File:new|filename|
|00001e40| 5d 3b 0a 09 72 65 74 75 | 72 6e 20 28 69 6e 74 29 |];..retu|rn (int)|
|00001e50| 72 65 70 6c 79 3b 0a 7d | 0a 0a 2d 20 28 42 4f 4f |reply;.}|..- (BOO|
|00001e60| 4c 29 61 70 70 41 63 63 | 65 70 74 73 41 6e 6f 74 |L)appAcc|eptsAnot|
|00001e70| 68 65 72 46 69 6c 65 3a | 73 65 6e 64 65 72 0a 7b |herFile:|sender.{|
|00001e80| 0a 09 72 65 74 75 72 6e | 20 59 45 53 3b 0a 7d 0a |..return| YES;.}.|
|00001e90| 0a 40 65 6e 64 0a 0a    |                         |.@end.. |        |
+--------+-------------------------+-------------------------+--------+--------+